home *** CD-ROM | disk | FTP | other *** search
- Path: news.larc.nasa.gov!amiga-request
- From: amiga-request@ab20.larc.nasa.gov (Amiga Sources/Binaries Moderator)
- Subject: v91i078: BattMem 1.1 - edit battery-backed memory on A3000, Part01/01
- Reply-To: blgardne@javelin.sim.es.com (Blaine Gardner)
- Newsgroups: comp.sources.amiga
- Message-ID: <comp.sources.amiga:v91i078@ab20.larc.nasa.gov>
- Date: 04 Apr 91 22:06:25 GMT
- Approved: tadguy@uunet.UU.NET (Tad Guy)
- X-Mail-Submissions-To: amiga@uunet.uu.net
- X-Post-Discussions-To: comp.sys.amiga.misc
-
- Submitted-by: blgardne@javelin.sim.es.com (Blaine Gardner)
- Posting-number: Volume 91, Issue 078
- Archive-name: utilities/battmem-1.1/part01
-
- Battmem is an editor for the battery backed RAM in the Amiga 3000. Battmem
- requires AmigaDOS 2.0 and an Amiga 3000. Currently there are four items
- that can be changed, SCSI controller ID, Synchronous SCSI, SCSI Timeout,
- and SCSI luns.
-
- #!/bin/sh
- # This is a shell archive. Remove anything before this line, then unpack
- # it by saving it into a file and typing "sh file". To overwrite existing
- # files, type "sh file -c". You can also feed this as standard input via
- # unshar, or by typing "sh <file", e.g.. If this archive is complete, you
- # will see the following message at the end:
- # "End of archive 1 (of 1)."
- # Contents: battmem.doc battmem.uu battmem0.uu changes.doc
- # Wrapped by tadguy@ab20 on Thu Apr 4 17:06:22 1991
- PATH=/bin:/usr/bin:/usr/ucb ; export PATH
- if test -f 'battmem.doc' -a "${1}" != "-c" ; then
- echo shar: Will not clobber existing file \"'battmem.doc'\"
- else
- echo shar: Extracting \"'battmem.doc'\" \(2228 characters\)
- sed "s/^X//" >'battmem.doc' <<'END_OF_FILE'
- X
- X BattMem v1.1
- X
- X By
- X Doug Keller
- X
- X Copyright 1990 Synthetic Technologies
- X
- X
- X[0] Introduction
- X
- XBattmem is an editor for the battery backed RAM in the Amiga 3000. Battmem
- Xrequires AmigaDOS 2.0 and an Amiga 3000. Currently there are four items
- Xthat can be changed, SCSI controller ID, Synchronous SCSI, SCSI Timeout,
- Xand SCSI luns.
- X
- XIt is pretty self explanatory how Battmem works. Near the bottom of the
- Xwindow there is a box that shows the 96 bits of the battery backed memory.
- X
- XIf Battmem is run on a machine other then an A3000, it will appear to work.
- XApparently the ReadBattMem() and WriteBattMem() functions do not return
- Xerrors if run on a non A3000 machine.
- X
- X
- X[1] SCSI Controller ID
- X
- XThis is the SCSI ID of the hard disk controller. The default is 7. These
- Xare bits 65, 66, and 67 of the battery backed ram.
- X
- X
- X[2] Initiate Synchronous SCSI
- X
- XThis will tell the driver to initiate synchronous SCSI transfers. Only use
- Xthis if the hard drive you have supports synchronous SCSI. All Quantums
- Xsupport synchronous SCSI. This is bit 68 for the battery backed ram.
- X
- X
- X[3] SCSI Timeout
- X
- XThis is the amount of time the 3000 waits on power up for the hard drive.
- XWith Quantums 128ms is fine but from what I hear Seacrates need it set to 2
- Xsecs since they take longer to power up. This is bit 1 of the battery
- Xbacked ram.
- X
- X
- X[4] SCSI Lun
- X
- XThis determines weather the 3000 checks just lun 0 or checks all luns. If
- Xyou have an adaptic or some other SCSI device that supports multiple luns
- Xthen you might need to set this bit. This is bit 2 of the battery backed
- Xram.
- X
- X
- X[5] Legal junk
- X
- XPermission is granted to distribute this program and its documentation for
- Xnon-commercial purposes as long as the copyright notices are not removed.
- XThis program may not distributed for a profit without permission from Doug
- XKeller. Fred Fish has permission to distribute this program as part of the
- XFred Fish library.
- X
- X
- X[6] Bugs and Info
- X
- XIf you would like to get in touch with me I can be reached on the following
- X
- X BIX: dkeller
- X
- X UUCP: dsk@ibm.com until December 1990
- X
- X dkeller@lynx.northeastern.edu starting Jan 1991
- END_OF_FILE
- if test 2228 -ne `wc -c <'battmem.doc'`; then
- echo shar: \"'battmem.doc'\" unpacked with wrong size!
- fi
- chmod +x 'battmem.doc'
- # end of 'battmem.doc'
- fi
- if test -f 'battmem.uu' -a "${1}" != "-c" ; then
- echo shar: Will not clobber existing file \"'battmem.uu'\"
- else
- echo shar: Extracting \"'battmem.uu'\" \(6366 characters\)
- sed "s/^X//" >'battmem.uu' <<'END_OF_FILE'
- Xbegin 700 battmem
- XM```#\P`````````"``````````$```/^````90```^D```/^2.=^_B1()`!)0
- XM^0`````L>``$1_D```#L<@`@/````"I@`B;!4<C__"E/`2PI3@$D0JP!*'``J
- XM(CP``#``3J[^SD/Z`91P`$ZN_=@I0`&09@9P9&```28F;@$4*6L`F`$@2JL`5
- XMK&<``)(@#Y"O`#@&@````(`I0`#P(&L`K-'(T<@B:``0T\G3R2`"<@`2&2E)6
- XM`330@5Z``D#__"E``3Q(YT!`(CP``0`!3J[_.DJ`9@P@/````^@O`&<``1`@5
- XM0"E``3A,WP("(`)3@-2!$;(``"`"4X)1R/_V$;P`("`"4X(1O``B(`(1L2``Z
- XM(`%1RO_X$+P`(B\(8'(I:P`Z`/!P?U*`T:P`\$'K`%Q.KOZ`0>L`7$ZN_HPI/
- XM0`$H+P`D0"`J`"1G$BQL`9`@0"(H```I00$@3J[_@B(J`"!G&B0\```#[4ZNW
- XM_^(I0`$P9PKEB"!`)V@`"`"D(&P!*"\(2&P`["!H`"0I:``$`31.N@Y$3KH.F
- XM-'``8`0@+P`$+P`@+`$89P0@0$Z03KH.%"QX``0B;`&03J[^8DZZ#AI*K`$HT
- XM9QPB+`$P9P1.KO_<+'@`!$ZN_WPB;`$H3J[^AF`.("P!/&<((FP!.$ZN_RX@0
- XM'RYL`2Q,WW]^3G5D;W,N;&EB<F%R>0```$Y5_^Q(YP$R)D@N`$'Y````>$/MH
- XM_^QP!"+84<C__"M+__@O"Y'(0^W_["1()D@L;``,3J[]M"9?(`=A``-R3-],L
- XM@$Y=3G5T;W!A>BYF;VYT```P`#$`,@`S`#0`-0`V`#<`;V9F`&]N```Q,C@@P
- XM;7,``#(@<V5C<P``;VYL>2`P``!T<GES(&%L;````"1615(Z($)A='1M96T@R
- XM,2XP``!"871T;65M('8Q+C```$]+``!I;G1U:71I;VXN;&EB<F%R>0!G<F%P(
- XM:&EC<RYL:6)R87)Y``!#;W5L9"!N;W0@;W!E;B!G<F%P:&EC<RYL:6)R87)Y8
- XM`&=A9'1O;VQS+FQI8G)A<GD``$-O=6QD(&YO="!O<&5N(&=A9'1O;VQS+FQIZ
- XM8G)A<GD`0V]U;&0@;F]T(&QO8VL@9&5F875L="!P=6)L:6,@<V-R965N``!#8
- XM;W5L9"!N;W0@1V5T5FES=6%L26YF;P!B871T;65M+G)E<V]U<F-E``!#;W5LX
- XM9"!N;W0@9V5T(&)A='1M96TN<F5S;W5R8V4``$-O=6QD(&YO="!A;&QO8V%T]
- XM92!M96UO<GD`0F%T=$UE;2!V,2XQ("```$YO=B`Q."`Q.3DP`$-O=6QD(&YO1
- XM="!O<&5N('=I;F1O=P!#;VYT<F]L;&5R($E$`%-#4TD``$EN:71I871E``!3+
- XM>6YC:')O;F]U<R!30U-)``!30U-)(%1I;65O=70``%-#4TD@3'5N``!3879ES
- XM``!#86YC96P``&)Y``!$;W5G($ME;&QE<@!B:70P``!B:70Y-@!#;W5L9"!N1
- XM;W0@0W)E871E1V%D9V5T<P`@`"4P,FQX`$5R<F]R(')E861I;F<@8F%T=&UE"
- XM;0!%<G)O<B!W<FET:6YG(&)A='1M96T`3E7_I$CG`!(P?``$)E!!^0```(Q#;
- XM[?^E<%82V%'(__Q#^OWN<"$L>``$3J[]V"E```QF!G`480``U`QK`"0`%&06*
- XM<`!![?^E<BTL;``,3J[_IG`480``MD/Z_<AP)"QX``1.KOW8*4``$&8*<!1!^
- XM^OW$80#\ZD/Z_=QP)"QX``1.KOW8*4``%&8*<!1!^OW880#\S)'(+&P`#$ZN(
- XM_@(I0```9@IP%$'Z_=YA`/RR0J<O+```3KH*"%!/*4`!2&8*<!1!^OWH80#\B
- XMED/Z_?@L>``$3J[^#BE``!QF"G`40?K]]F$`_'IP8'(!2$$L>``$3J[_.BE`(
- XM`"!F"G`40?K]^&$`_%Q,WT@`3EU.=4CG`0(N`"`L``1G"B!`+&P`#$ZN_[@@6
- XM+```9PR1R")`+&P`#$ZN_?P@+``49QP@;`%(+$!.KO]\(&P`&$ZN_]PB3BQX=
- XM``1.KOYB2JP`#&<,(FP`#"QX``1.KOYB2JP`$&<,(FP`$"QX``1.KOYB2JP`$
- XM(&<.(FP`('!@+'@`!$ZN_RX@!TZZ^V),WT"`3G5.5?_X2.<P($'Y````Y$/M%
- XM__@BV"+8(FP``"!I`"AP`#`H``1R`!(I`"/2@%*!.4$!3#M!__Y!^OT^1>P!3
- XM3B38)-@DV#300A)![`%.0_K].$ZZ"4)P`#`L`4QR1M*!T(%R`"\!2&P!3B\\@
- XM@```;DAX``LO/(```'-(>`!&+SR```!R+SP`!`)D+SR```!J2&W_^"\\@```[
- XM?2\!)#R```"!+P)V`2\#+SR```"*+P,O/(```(DO`R\\@```C"\#+P(O`2\\J
- XM@```A"\#+SR```"#+P,O/(```((O+```+SR```!Y+P,O/(```)`O`"\\@```)
- XM9TAX`2(O/(```&9(>``4+SR```!E2'@`>"\\@```9$*G3KH(*$_O`*`I0``$R
- XM9@IP%$'Z_&YA`/J<3-\$#$Y=3G5P`#`L`4QR6M"!+RP!2"\\@`@`-$AX``$OJ
- XM/(`(`#-(>``62'@!#B\`2'@`"B!L``0O*``R3KH'@$_O`"1.=4Y5_^!(YP`BU
- XM0>P`&"QL`!1.KO^.*4`!0$'L`"0K2/_N<"0K0/_T*VP!2/_X.WP`'O_B,"P!Q
- XM3`9``!D[0/_D.WP`2__F.WP`#O_H0FW_\D'Z^^@K2/_J<``@;``@$"@`"$:`8
- XMZ(!R!\"!0J<O`"\\@`@`#TAL`"PO/(`(``Y(;?_B+RP!0"\!3KH&U$_O`"`IH
- XM0`%`<#`K0/_T,"P!3%9`.T#_Y#M\``G_Z$'Z^YPK2/_J0J=(;?_B+RP!0$AX,
- XM``U.N@:<3^\`$"E``4`[?`"J_^(P+`%,5D`[0/_D0?K[<"M(_^I"ITAM_^(O^
- XM+`%`2'@`#4ZZ!FI/[P`0*4`!0#`L`4P&0``,.T#_Y$'Z^TPK2/_J0J=(;?_B@
- XM+RP!0$AX``U.N@8\3^\`$"E``4`[?``!__([?`#(_^(P+`%,!D``&3M`_^1P*
- XM`2M`__1R`"!L`"`2*``(YH'"@$*G2'@`!"\\@`@`/2\!+SR`"``*2&P`4"\\A
- XM@`@`"4AM_^(O+`%`2'@`!4ZZ!=I/[P`H*4`!0#M\`![_XC`L`4P&0``R.T#_0
- XMY'`P*T#_]$'Z^L(K2/_J0J=(;?_B+RP!0$AX``U.N@6@3^\`$"E``4`[?``"[
- XM__([?`!0_^(P+`%,!D``/SM`_^1P`2M`__1R`"!L`"`2$.R!PH!"ITAX``0O_
- XM/(`(`#TO`2\\@`@`"DAL`%PO/(`(``E(;?_B+RP!0$AX``5.N@5`3^\`*"E`-
- XM`4`[?`"J_^(P+`%,!D``,CM`_^1P,"M`__1!^OHV*TC_ZD*G2&W_XB\L`4!(J
- XM>``-3KH%!D_O`!`I0`%`.WP``__R.WP`W/_B,"P!3`9``#\[0/_D<`$K0/_T*
- XM<@`@;``@$A#J@<*`0J=(>``$+SR`"``]+P$O/(`(``I(;`!H+SR`"``)2&W_#
- XMXB\L`4!(>``%3KH$ID_O`"@I0`%`.WP`%/_B,"P!3`9``'@[0/_D.WP`0__F5
- XM.WP`#/_H<!`K0/_T0?KYFBM(_^H[?``$__)"ITAM_^(O+`%`2'@``4ZZ!%HI)
- XM0`%`.WP`R__B0?KY=BM(_^H[?``%__)"ETAM_^(O`$AX``%.N@0R3^\`'"E`W
- XM`4`P+`%,!D``?3M`_^0[?`!E_^)!^OE&*TC_ZCM\``+_Z#M\`%C_YG`$*T#_0
- XM]$*G2'KY+B\\@`@`"TAM_^(O+`%`2'@`#4ZZ`^)/[P`8*4`!0#M\`"G_XC`L-
- XM`4P&0`!=.T#_Y#M\`-?_YCM\``C_Z'`0*T#_])'(*TC_ZB\(2&P!:"\\@`@`!
- XM"TAM_^(O+`%`2'@`#4ZZ`Y1/[P`8*4`!0"E``40[?``5_^(P+`%,!D``9CM`4
- XM_^0[?``8_^9!^OBN*TC_ZG`P*T#_]$*G2&W_XB\L`41(>``-3KH#4"E``4`[^
- XM?`#R_^)!^OB**TC_ZG`P*T#_]$*72&W_XB\L`4!(>``-3KH#)D_O`!PI0`%`S
- XM9@IP%$'Z^&1A`/8*(&P`!")L`!AP_R(`E<HL;``,3J[^2B!L`!@B;``$</].M
- XMKOY0(&P`!")*+&P`%$ZN_ZQA`/M"3-]$`$Y=3G5.5?_\2.<#`"X`<``90`%HV
- XM+`!@1G`$O`!G!G`(O`!F#$'L`6A#^O@23KH#<'``$`8@;``@T,!P`!`0+P!(V
- XM>O?\2&W__DZZ`Q1![`%H0^W__DZZ`TA/[P`,4@9P#+P`9;1*1V8>0J=(;`%HB
- XM+SR`"``+0J<O+``$+RP!1$ZZ`I)/[P`83-\`P$Y=3G4O#BQL`!Q.KO_Z(&P`C
- XM('``<F!.KO_N2H!G$$AZ]YI(;`%H3KH"K%!/8`9P`6$`_T@L;``<3J[_]"Q?^
- XM3G4O#BQL`!Q.KO_Z(&P`('``<F!.KO_H2H!G"G`40?KW<F$`].(L;``<3J[_#
- XM]"Q?3G5.5?_T2.<@$F$`]VQA`/D"88)A`/IL(&P`!"!H`%8L;``43J[_N"9`V
- XM(`MF'B)L``0@:0!6<``0*``/<@'AH2`!+'@`!$ZN_L)@S"!+)F@`'"`H`!0R@
- XM*``8+T``$C]!``PB2"QL`!1.KO^R("\`$EF`9P`!/'(<D(%G%'(@D(%G``#&8
- XM!(````'`9P`!1F"(,"L`)E-`9PQ30&=$4T!G=&``_W9*;P`,9Q@@;``@$"@`+
- XM""(```$`""!L`"`100`(8!0@;``@$"@`"`H```@@;``@$4``"'``80#^,F``1
- XM_SI*;P`,9Q0@;``@$!`B```!`$`@;``@$(%@$"!L`"`0$`H``$`@;``@$(!P7
- XM`&$`_?Y@`/\&2F\`#&<4(&P`(!`0(@```0`@(&P`(!"!8!`@;``@$!`*```@S
- XM(&P`(!"`<`!A`/W*8`#^TC`K`"9*0&<,64!G1%-`9TY@`/Z^(&P`(!`H``@BX
- XM``(!`(\@;``@$4$`"'``,"\`#$:`Z8!T<,""=``4`82`(&P`(!%"``AP`&$`M
- XM_7I@`/Z"80#^.'``80#VY&``_G1P`&$`]MI@`/YJ(&P`!"QL`!1.KO^F80#X*
- XMAB!L``1P`2QL`!1.KO^@8`#^2'``80#VKF``_CX``$CG`"(L>0```!1%[P`,/
- XM3-H#`4ZN_^),WT0`3G5(YS`"+'D````40^\`$"!93-D`#TZN_XA,WT`,3G4`_
- XM`$CG`#(L>0```!1'[P`03-L'`$ZN_]9,WTP`3G4O#BQY````%$/O``@@64ZN^
- XM_X(L7TYU```O#BQY````#$/O``@@64ZN_:(L7TYU``!(YP`Z)F\`%"!O`!A#5
- XM[P`<1?H`$BQY````!$ZN_?9,WUP`3G46P$YU8```)DYQ```@;P`$8`#]9DYQQ
- XM``!.=4YU(`A*&&;\4X@0V6;\3G4``$CG`#(F;`&$(`MG%"13(DL@*0`(+'@`2
- XM!$ZN_RXF2F#HD<@I2`&(*4@!A$S?3`!.=7``3G4```/L````"@````$```]@$
- XM```/2```#RX```\.```.\@``!BH```26```!\@```!0````*`````````_(`!
- XM``/J````.P``````````````````````````````````````````````````H
- XM`BH`"``````"-@```C@```(Z```"/````CX```)````"0@```D0````````"N
- XM1@```DH````````"3@```E8````````"7@```F8````````"<````!0`````(
- XM```"A`````````*2`((00F%T=&UE;2!R97%U:7)E<R!!;6EG841/4R!296QE3
- XM87-E(#(N,"!O<B!H:6=H97(``0#('5!R97-S(&UO=7-E(&)U='1O;B!T;R!C_
- XM;VYT:6YU90````!X`!0!(@`+```#[````!(`````````B````(````!T````Y
- XM;````&@```!@````7````%0```!0````2````$0```!`````/````#@````TH
- X4````,````"P````D`````````_)0%
- X``
- Xend
- Xsize 4520
- END_OF_FILE
- if test 6366 -ne `wc -c <'battmem.uu'`; then
- echo shar: \"'battmem.uu'\" unpacked with wrong size!
- fi
- # end of 'battmem.uu'
- fi
- if test -f 'battmem0.uu' -a "${1}" != "-c" ; then
- echo shar: Will not clobber existing file \"'battmem0.uu'\"
- else
- echo shar: Extracting \"'battmem0.uu'\" \(767 characters\)
- sed "s/^X//" >'battmem0.uu' <<'END_OF_FILE'
- Xbegin 700 battmem.info
- XMXQ```0`````!```/`#P`&P`%``$``0?7)'0```````1U5@```````````&0`+
- XM```!`Z(`````!\V.*(````"````````````````````````````\`!H``@`"*
- XM8Y`#``````````````````__````````/@?```````!\`^```````'X#X```)
- XM```0?@/@`````#`\!^``````,``/P``````P`#^``````#``_@```X``,`'X,
- XM```?^``P`\```/__`#`!X``'__X`,````#__]@`P`>`!__^T`#`!X`?__:``Y
- XM,```!__M```P```'_V@``#````#[0```,`````H````P`````````#``````&
- XM````,``````````P`````````#``````````,`'________P#_\````````PI
- XM`,```````$'X(```````@@00``````"!!!______X($$%555555`0@@55555[
- XM54`\,"?____]0`#`7_____U``0&?__Q__4`"!G__X`?]0`0Y__\``/U``A7_+
- XM^``!_4`!Y?_```G]0`(5_@``2_U``A7X``)?_4`!Y?@`$O_]0`(5^`"7__U`Y
- XM`U7_!+___4`#5?_U___]0`-5______U``U7______4`#5?_____]0`-55555G
- X7555``U55555554`"``````````````1`Q
- X``
- Xend
- Xsize 518
- END_OF_FILE
- if test 767 -ne `wc -c <'battmem0.uu'`; then
- echo shar: \"'battmem0.uu'\" unpacked with wrong size!
- fi
- # end of 'battmem0.uu'
- fi
- if test -f 'changes.doc' -a "${1}" != "-c" ; then
- echo shar: Will not clobber existing file \"'changes.doc'\"
- else
- echo shar: Extracting \"'changes.doc'\" \(295 characters\)
- sed "s/^X//" >'changes.doc' <<'END_OF_FILE'
- XBattMem v1.1 Nov 18, 1990
- X
- X Fixed Enforcer hit
- X
- X Calling XCEXIT() instead of exit() saves a lot of space, since
- X exit() pulls in a bunch of cleanup stuff
- X
- X Using _main instead of DEFINE @_main=@_tinymain, saves more space
- X
- X Added 'by Doug Keller' text
- X
- X
- XBattmem v1.0 Oct 13, 1990
- X First release
- END_OF_FILE
- if test 295 -ne `wc -c <'changes.doc'`; then
- echo shar: \"'changes.doc'\" unpacked with wrong size!
- fi
- chmod +x 'changes.doc'
- # end of 'changes.doc'
- fi
- echo shar: End of archive 1 \(of 1\).
- cp /dev/null ark1isdone
- MISSING=""
- for I in 1 ; do
- if test ! -f ark${I}isdone ; then
- MISSING="${MISSING} ${I}"
- fi
- done
- if test "${MISSING}" = "" ; then
- echo You have the archive.
- rm -f ark[1-9]isdone
- else
- echo You still need to unpack the following archives:
- echo " " ${MISSING}
- fi
- ## End of shell archive.
- exit 0
- --
- Mail submissions (sources or binaries) to <amiga@uunet.uu.net>.
- Mail comments to the moderator at <amiga-request@uunet.uu.net>.
- Post requests for sources, and general discussion to comp.sys.amiga.misc.
-